home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Prog / N-P / NIFTY / myCShell / ictb.asm < prev    next >
Encoding:
Assembly Source File  |  1991-12-29  |  3.0 KB  |  145 lines  |  [TEXT/McSk]
  1.     prtr    "/E/$45"    ; ImageWriter set to Elite.
  2.     name    ictbRSRC
  3.      title    "$"        ; Date in Page's Header.
  4.     terse            ; Optional.
  5.     
  6.       
  7.     
  8. ; "ictbRSRC.asm"
  9. ;
  10. ; By John A. Love, III
  11. ; { from: Washington Apple Pi Users' Group }
  12. ;
  13. ; [ using "McAssembly" (v7.8) from Signature Software ]
  14.  
  15.  
  16.  
  17. ;****************************************************************
  18. ; The parts of my HFS Path Names:
  19.  
  20. volName        define    "HD"
  21. asmFolder    define    "HD:McAsm Folder"
  22. interfaceFolder    define    "HD:McAsm Folder:Interface Folder"
  23.  
  24. ;****************************************************************
  25.  
  26.  
  27. ; INCLUDE file : ToolEqu.PSM
  28. ;
  29. ;   with LISTing turned off.
  30.  
  31.  
  32.     LIST    0        ; OFF.
  33.     
  34.     ipath    "{interfaceFolder}:Boot EQUates ƒ:"
  35.     incl    "ToolEqu.PSM"
  36.         
  37.     LIST    1        ; Back ON.
  38.  
  39.  
  40.  
  41. ; Attributes ...
  42. PL        equ    (1 SHL resPreload) + (1 SHL resLocked)
  43. P        equ    (1 SHL resPreload)
  44.  
  45.  
  46. ; DLOG resource IDs:
  47. Help_Window    equ    300
  48. Help_Error    equ    301
  49.  
  50.  
  51. ; ============
  52. ; Color stuff:
  53.  
  54. ccSeed        equ    0
  55. ccReserved    equ    0
  56. ccSize        equ    4-1
  57.  
  58.  
  59.     ftype    'rsrc'
  60.     fsign    'RSED'
  61.  
  62.  
  63. [[ ictb, Help_Window, PL, HELP Window
  64.  
  65. startHelpICTB
  66.  
  67.     dc.w    endDoneCT-startDoneCT,startDoneCT-startHelpICTB       ; "Done" Button
  68.     dc.w    0,0                              ; Topics_Area
  69.     dc.w    0,0                              ; Display_Area
  70.     dc.w    endButtCT-startButtCT,startButtCT-startHelpICTB       ; "Next"
  71.     dc.w    endButtCT-startButtCT,startButtCT-startHelpICTB       ; "Previous"
  72.     ; Mast_Head + Message_Area:
  73.     dc.w    8                ; Change Font foreColor.
  74.     dc.w    startStyleCT-startHelpICTB
  75.     dc.w    8,startStyleCT-startHelpICTB
  76.  
  77. startDoneCT
  78.     dc.l    ccSeed
  79.     dc.w    ccReserved
  80.     dc.w    ccSize-1
  81.     dc.w    cFrameColor,    0,      0,      65535   ; Blue.
  82.     dc.w    cBodyColor,     57344,  57344,  57344   ; Light gray.
  83.     dc.w    cTextColor,     0,      0,      0       ; Black.
  84. ;    dc.w    cThumbColor,    0,      0,      0
  85. endDoneCT
  86.  
  87. startButtCT
  88.     dc.l    ccSeed
  89.     dc.w    ccReserved
  90.     dc.w    ccSize-1
  91.     dc.w    cFrameColor,    0,      65535,  0       ; Green.
  92.     dc.w    cBodyColor,     57344,  57344,  57344   ; Light gray.
  93.     dc.w    cTextColor,     0,      0,      0       ; Black.
  94. ;    dc.w    cThumbColor,    0,      0,      0
  95. endButtCT
  96.  
  97. startStyleCT
  98.     dc.w    0                    ; diFont
  99.     dc.w    0                    ; diStyle
  100.     dc.w    0                    ; diSize
  101.     dc.w    0,      0,      65535            ; foreground = blue
  102.     dc.w    65535,  65535,  65535            ; background = white
  103.     dc.w    0                    ; diMode
  104. endStyleCT
  105.  
  106. ]]
  107.  
  108. ; ----------
  109.  
  110. [[ ictb, Help_Error, PL, Error Dialog
  111.  
  112. startErrorICTB
  113.  
  114.     dc.w    endOKCT-startOKCT,startOKCT-startErrorICTB    ; "OK" button
  115.     dc.w    0,0                        ; UserItem for
  116.                                 ;  framing "OK"
  117.                                 ;  Button.
  118.     dc.w    0,0                        ; cautionIcon.
  119.     ; 3 StaticText items:
  120.     dc.w    8,startTextCT-startErrorICTB
  121.     dc.w    8,startTextCT-startErrorICTB
  122.     dc.w    8,startTextCT-startErrorICTB
  123.     dc.w    0,0                        ; Picture.
  124.  
  125. startOKCT
  126.     dc.l    ccSeed
  127.     dc.w    ccReserved
  128.     dc.w    ccSize-1
  129.     dc.w    cFrameColor,    0,      0,      65535
  130.     dc.w    cBodyColor,     57344,  57344,  57344
  131.     dc.w    cTextColor,     0,      0,      0
  132. ;    dc.w    cThumbColor,    0,      0,      0
  133. endOKCT
  134.  
  135. startTextCT
  136.     dc.w    0                    ; diFont
  137.     dc.w    0                    ; diStyle
  138.     dc.w    0                    ; diSize
  139.     dc.w    0,      0,      65535            ; foreground = blue
  140.     dc.w    65535,  65535,  65535            ; background = white
  141.     dc.w    0                    ; diMode
  142. endTextCT
  143.  
  144. ]]
  145.